﻿Module Module1

    Sub Main()
        Dim dps As New DayPhanSo
        dps = DayPhanSo.Nhap()
        dps.Xuat()
        Dim s As New PhanSo
        s = dps.Tong()
        s.Xuat()


        'dps = DayPhanSo.Xuat
        'ps = PhanSo.Xuat()
        Console.ReadLine()

    End Sub

End Module
